home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip: 25 Years Anniversary
/
CHIP_25Jahre_Jubilaeum.iso
/
downloads
/
388320
/
MailWash.exe
/
{app}
/
MailWasher.exe
/
0
/
RCDATA
/
TPREVIEWFORM
/
TPREVIEWFORM.txt
Wrap
Text File
|
2003-03-07
|
5KB
|
233 lines
object PreviewForm: TPreviewForm
Left = 415
Top = 259
Width = 532
Height = 480
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
BorderIcons = [biSystemMenu, biMaximize]
Caption = '<email subject>'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
OnActivate = FormActivate
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyDown = FormKeyDown
OnPaint = FormPaint
OnResize = FormResize
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 8
Top = 5
Width = 32
Height = 13
Caption = 'From:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 8
Top = 21
Width = 32
Height = 13
Caption = 'Date:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 8
Top = 37
Width = 20
Height = 13
Caption = 'To:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 8
Top = 53
Width = 48
Height = 13
Caption = 'Subject:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object SubjectEdit: TEdit
Left = 64
Top = 53
Width = 497
Height = 17
TabStop = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 0
Text = 'SubjectEdit'
OnKeyDown = FormKeyDown
end
object ToEdit: TEdit
Left = 64
Top = 37
Width = 497
Height = 17
TabStop = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 1
Text = 'ToEdit'
OnClick = EmailEditClick
OnKeyDown = FormKeyDown
end
object DateEdit: TEdit
Left = 64
Top = 21
Width = 385
Height = 17
TabStop = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 2
Text = 'DateEdit'
OnKeyDown = FormKeyDown
end
object FromEdit: TEdit
Left = 64
Top = 5
Width = 497
Height = 17
TabStop = False
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 3
Text = 'FromEdit'
OnClick = EmailEditClick
OnKeyDown = FormKeyDown
end
object StatusBar: TLMDStatusBar
Left = 0
Top = 432
Width = 561
Height = 21
OldStyle = False
ControlGap = 3
Panels = <
item
Bevel.Mode = bmStandard
Bevel.StandardStyle = lsSingleLowered
Style = spPanel
Size = 80
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Index = 0
DisplayName = 'TLMDStatusPanel'
BarPanelId = 2
end
item
Alignment = agCenterLeft
Bevel.BorderInnerWidth = 3
Bevel.Mode = bmStandard
Bevel.StandardStyle = lsSingleLowered
Style = spText
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Index = 1
DisplayName = 'TLMDStatusPanel'
BarPanelId = 0
end>
Bevel.Mode = bmCustom
Bevel.StandardStyle = lsSingleLowered
Align = alBottom
object TLMDStatusCustomPanel
Left = 4
Top = 1
Width = 78
Height = 19
BarPanelId = 2
object ProgressBar: TLMDProgressFill
Left = 0
Top = 0
Width = 78
Height = 19
Align = alClient
Bevel.StyleOuter = bvLowered
Bevel.WidthInner = 0
Bevel.WidthOuter = 0
Bevel.Mode = bmCustom
Bevel.StandardStyle = lsSingleLowered
FillObject.Style = sfBrush
FillObject.Brush.Color = clHighlight
end
end
end
object DisplayRawCheckBox: TCheckBox
Left = 312
Top = 64
Width = 211
Height = 17
Anchors = [akTop, akRight]
Caption = 'Display full header and message source'
TabOrder = 5
OnClick = DisplayRawCheckBoxClick
end
object BodyMemo: THighlightedMemo
Left = 0
Top = 88
Width = 185
Height = 89
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
Lines.Strings = (
'BodyMemo')
ParentFont = False
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 6
OnKeyDown = BodyMemoKeyDown
CaretVisible = False
TabAmount = 0
end
object DoingSomethingTimer: TTimer
Interval = 40
OnTimer = DoingSomethingTimerTimer
Left = 528
Top = 8
end
end